home *** CD-ROM | disk | FTP | other *** search
/ ftp.cs.arizona.edu / ftp.cs.arizona.edu.tar / ftp.cs.arizona.edu / icon / newsgrp / group98b.txt / 000160_icon-group-sender _Fri Aug 28 13:11:48 1998.msg < prev    next >
Internet Message Format  |  2000-09-20  |  3KB
  1. Return-Path: <icon-group-sender>
  2. Received: from kingfisher.CS.Arizona.EDU (kingfisher.CS.Arizona.EDU [192.12.69.239])
  3.     by baskerville.CS.Arizona.EDU (8.9.1a/8.9.1) with SMTP id NAA02870
  4.     for <icon-group-addresses@baskerville.CS.Arizona.EDU>; Fri, 28 Aug 1998 13:11:47 -0700 (MST)
  5. Received: by kingfisher.CS.Arizona.EDU (5.65v4.0/1.1.8.2/08Nov94-0446PM)
  6.     id AA19641; Fri, 28 Aug 1998 13:11:22 -0700
  7. To: icon-group@optima.CS.Arizona.EDU
  8. Date: Fri, 28 Aug 1998 16:59:49 BST
  9. From: Bob Ardler <ardler@argonet.co.uk>
  10. Message-Id: <na.ecc435487c.a600a0ardler@argonet.co.uk>
  11. Organization: ArgoNet, but does not reflect its views
  12. Sender: icon-group-request@optima.CS.Arizona.EDU
  13. Reply-To: Bob Ardler <ardler@argonet.co.uk>
  14. Subject: A hood fan is guard to mind.
  15. Errors-To: icon-group-errors@optima.CS.Arizona.EDU
  16. Status: RO
  17. Content-Length: 2161
  18.  
  19. As long as nobody reads this newsgroup, I might as well ask
  20. somnolent iconians whether the following program, for generating
  21. polyspoonerisms, can be shortened by icon clever stuff. The nested
  22. "every"s seem reminiscent of lesser languages:-
  23.  
  24. procedure main()
  25.   L := ["g","m","h","f"]
  26.   every h:=1 to 4 do {
  27.     every i:=1 to 4 do {
  28.       every j:=1 to 4 do {
  29.         every k:=1 to 4 do {
  30.           write(fit(h,i,j,k))
  31.   }}}}
  32. end
  33.  
  34. global L,h,i,j,k
  35.  
  36. procedure fit(a,b,c,d)
  37.   if a=b|a=c|a=d|b=c|b=d|c=d then fail
  38.   return "A "||L[a]||"ood "||L[b]||"an is "||L[c]||"ard to "||L[d]||"ind."
  39. end
  40.  
  41. Of the generated spoonerisms, only the following, with suitably amended
  42. spelling, appear to be viable:-
  43.  
  44. A good man is hard to find.
  45. A mood fan is guard to hind.
  46. A good man is fard to hind.
  47. A hood man is guard to find.
  48. A good fan is marred to hind.
  49. A hood fan is guard to mind.
  50. A good fan is hard to mind.
  51. A food man is guard to hind.
  52.  
  53. Malheureusement, ca ne marche point en francais:-
  54.  
  55. Un bon homme est difficile a trouver.
  56. Un bon homme est tifficile a drouver.
  57. Un bon domme est hifficile a trouver.
  58. Un bon domme est tifficile a hrouver.
  59. Un bon tomme est hifficile a drouver.
  60. Un bon tomme est difficile a hrouver.
  61. Un hon bomme est difficile a trouver.
  62. Un hon bomme est tifficile a drouver.
  63. Un hon domme est bifficile a trouver.
  64. Un hon domme est tifficile a brouver.
  65. Un hon tomme est bifficile a drouver.
  66. Un hon tomme est difficile a brouver.
  67. Un don bomme est hifficile a trouver.
  68. Un don bomme est tifficile a hrouver.
  69. Un don homme est bifficile a trouver.
  70. Un don homme est tifficile a brouver.
  71. Un don tomme est bifficile a hrouver.
  72. Un don tomme est hifficile a brouver.
  73. Un ton bomme est hifficile a drouver.
  74. Un ton bomme est difficile a hrouver.
  75. Un ton homme est bifficile a drouver.
  76. Un ton homme est difficile a brouver.
  77. Un ton domme est bifficile a hrouver.
  78. Un ton domme est hifficile a brouver.
  79.  
  80. Dormez bien, mes amis,
  81. Bob.
  82.  
  83.  
  84.  
  85.  
  86. -- 
  87.  __  __  __  __  __  __ ___   _____________________________________________
  88. |__| R   G   O   N   E   |   /
  89. |  |        Bob          |  /...Internet access for all Acorn RISC machines
  90. ___________________________/ ardler@argonet.co.uk
  91.  
  92.  
  93.